inherited fmTabel_Create_ON: TfmTabel_Create_ON
  Left = 446
  Top = 180
  Width = 783
  Height = 532
  Caption = #1057#1086#1079#1076#1072#1085#1080#1077' '#1090#1072#1073#1077#1083#1103
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited sbBottom: TStatusBar
    Top = 471
    Width = 775
  end
  inherited Panel1: TPanel
    Width = 775
    inherited BitBtn1: TBitBtn
      Left = 605
    end
    inherited BitBtn2: TBitBtn
      Left = 693
    end
  end
  object ToolBar2: TToolBar [2]
    Left = 0
    Top = 45
    Width = 775
    Height = 34
    AutoSize = True
    BorderWidth = 2
    ButtonHeight = 24
    ButtonWidth = 28
    EdgeInner = esNone
    EdgeOuter = esNone
    Images = DMInv.ilActive
    TabOrder = 2
    TabStop = True
    Transparent = True
    object tbExcel: TToolButton
      Left = 0
      Top = 2
      Caption = 'tbExcel'
      ImageIndex = 16
      OnClick = tbExcelClick
    end
    object ToolButton2: TToolButton
      Left = 28
      Top = 2
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object cxLabel1: TcxLabel
      Left = 36
      Top = 2
      AutoSize = False
      Caption = #1044#1072#1090#1072
      Height = 24
      Width = 37
    end
    object eDate: TcxButtonEdit
      Tag = 11
      Left = 73
      Top = 2
      ParentFont = False
      Properties.Buttons = <
        item
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFF0FFFFFFFFFFFFFF000FFFFFFFFFFFF00000FFFFFFFFFF0000000F
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
        end>
      Properties.MaxLength = 0
      Properties.ReadOnly = True
      Properties.OnButtonClick = eDatePropertiesButtonClick
      Properties.OnChange = eDatePropertiesChange
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -13
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = [fsBold]
      Style.LookAndFeel.SkinName = ''
      Style.Shadow = False
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.SkinName = ''
      StyleFocused.LookAndFeel.SkinName = ''
      StyleHot.LookAndFeel.SkinName = ''
      TabOrder = 0
      Width = 240
    end
  end
  object dbgRS: TcxGrid [3]
    Left = 0
    Top = 161
    Width = 775
    Height = 310
    Align = alClient
    TabOrder = 3
    LookAndFeel.Kind = lfStandard
    object tvRS: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      NavigatorButtons.First.Visible = True
      NavigatorButtons.PriorPage.Visible = True
      NavigatorButtons.Prior.Visible = True
      NavigatorButtons.Next.Visible = True
      NavigatorButtons.NextPage.Visible = True
      NavigatorButtons.Last.Visible = True
      NavigatorButtons.Insert.Visible = False
      NavigatorButtons.Append.Visible = False
      NavigatorButtons.Delete.Visible = False
      NavigatorButtons.Edit.Visible = False
      NavigatorButtons.Post.Visible = False
      NavigatorButtons.Cancel.Visible = False
      NavigatorButtons.Refresh.Visible = False
      NavigatorButtons.SaveBookmark.Visible = False
      NavigatorButtons.GotoBookmark.Visible = False
      NavigatorButtons.Filter.Visible = False
      DataController.DataSource = dlgDS
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skCount
          FieldName = 'PID_EMPL'
          Column = tvRSFIO
        end
        item
          Format = '#,###0'
          Kind = skSum
          FieldName = 'ONVYPLACHENO'
          Column = tvRSONVYPLACHENO
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsBehavior.IncSearch = True
      OptionsCustomize.ColumnFiltering = False
      OptionsData.CancelOnExit = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Inserting = False
      OptionsView.NavigatorOffset = 10
      OptionsView.NoDataToDisplayInfoText = '<'#1053#1077#1090' '#1076#1072#1085#1085#1099#1093'>'
      OptionsView.CellAutoHeight = True
      OptionsView.CellTextMaxLineCount = 1
      OptionsView.ColumnAutoWidth = True
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      OptionsView.Indicator = True
      OptionsView.ShowColumnFilterButtons = sfbAlways
      Preview.Visible = True
      Styles.Content = DMInv.cxData
      Styles.IncSearch = DMInv.cxKrasniyText
      Styles.Selection = DMInv.cxJoltiyFon
      Styles.Header = DMInv.cxSiniyText
      object tvRSFIO: TcxGridDBColumn
        Caption = #1060#1048#1054
        DataBinding.FieldName = 'FIO'
        Width = 224
      end
      object tvRSONDATE: TcxGridDBColumn
        Caption = #1044#1072#1090#1072
        DataBinding.FieldName = 'ONDATE'
        Width = 79
      end
      object tvRSONVYPLACHENO: TcxGridDBColumn
        Caption = #1057#1091#1084#1084#1072
        DataBinding.FieldName = 'ONVYPLACHENO'
        Width = 140
      end
      object tvRSONOKNOTE: TcxGridDBColumn
        Caption = #1050#1086#1084#1084#1077#1085#1090'.'
        DataBinding.FieldName = 'ONOKNOTE'
        Width = 316
      end
    end
    object cxGridLevel7: TcxGridLevel
      GridView = tvRS
    end
  end
  object cxLabel2: TcxLabel [4]
    Left = 0
    Top = 79
    Align = alTop
    Caption = #1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1081' '#1082' '#1090#1072#1073#1077#1083#1102
  end
  object cxMemo1: TcxMemo [5]
    Left = 0
    Top = 96
    Align = alTop
    TabOrder = 5
    Height = 65
    Width = 775
  end
  inherited dlgDS: TDataSource
    DataSet = qTC
  end
  object qTC: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.IBTransaction1
    SQL.Strings = (
      
        'SELECT n.*,  p1.plastname || '#39' '#39' || SUBSTRING(p1.pname FROM 1 FO' +
        'R 1) ||'
      
        #39'. '#39' || COALESCE(SUBSTRING(p1.ppatronymic FROM 1 FOR 1) || '#39'.'#39', ' +
        #39' '#39') AS fio'
      'FROM OFFICIAL_NOTE n'
      'INNER JOIN people p1 ON p1.pid = n.PID_EMPL'
      'WHERE n.ONDATE BETWEEN :data1 AND :data2 and n.ONISOK = 1 ')
    GeneratorField.Field = 'TABID'
    Left = 296
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'data1'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'data2'
        ParamType = ptUnknown
      end>
    object intgrfldTCONID: TIntegerField
      FieldName = 'ONID'
      Origin = '"OFFICIAL_NOTE"."ONID"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object intgrfldTCPID_EMPL: TIntegerField
      FieldName = 'PID_EMPL'
      Origin = '"OFFICIAL_NOTE"."PID_EMPL"'
    end
    object intgrfldTCSDID: TIntegerField
      FieldName = 'SDID'
      Origin = '"OFFICIAL_NOTE"."SDID"'
    end
    object qTCONNOTE: TIBStringField
      FieldName = 'ONNOTE'
      Origin = '"OFFICIAL_NOTE"."ONNOTE"'
      Size = 255
    end
    object qTCONDATE: TDateField
      FieldName = 'ONDATE'
      Origin = '"OFFICIAL_NOTE"."ONDATE"'
    end
    object qTCONDATE_DOC: TDateField
      FieldName = 'ONDATE_DOC'
      Origin = '"OFFICIAL_NOTE"."ONDATE_DOC"'
    end
    object qTCONVALUE: TIBBCDField
      FieldName = 'ONVALUE'
      Origin = '"OFFICIAL_NOTE"."ONVALUE"'
      Precision = 18
      Size = 2
    end
    object intgrfldTCONISOK: TIntegerField
      FieldName = 'ONISOK'
      Origin = '"OFFICIAL_NOTE"."ONISOK"'
    end
    object qTCONOKNOTE: TIBStringField
      FieldName = 'ONOKNOTE'
      Origin = '"OFFICIAL_NOTE"."ONOKNOTE"'
      Size = 255
    end
    object qTCONUSERENTER: TIBStringField
      FieldName = 'ONUSERENTER'
      Origin = '"OFFICIAL_NOTE"."ONUSERENTER"'
      Size = 40
    end
    object qTCONTIMEENTER: TDateTimeField
      FieldName = 'ONTIMEENTER'
      Origin = '"OFFICIAL_NOTE"."ONTIMEENTER"'
    end
    object qTCONUSEREDIT: TIBStringField
      FieldName = 'ONUSEREDIT'
      Origin = '"OFFICIAL_NOTE"."ONUSEREDIT"'
      Size = 40
    end
    object qTCONTIMEEDIT: TDateTimeField
      FieldName = 'ONTIMEEDIT'
      Origin = '"OFFICIAL_NOTE"."ONTIMEEDIT"'
    end
    object intgrfldTCONISDELETE: TIntegerField
      FieldName = 'ONISDELETE'
      Origin = '"OFFICIAL_NOTE"."ONISDELETE"'
    end
    object qTCONVYPLACHENO: TIBBCDField
      FieldName = 'ONVYPLACHENO'
      Origin = '"OFFICIAL_NOTE"."ONVYPLACHENO"'
      DisplayFormat = '#,###0'
      Precision = 18
      Size = 2
    end
    object qTCONBACKNOTE: TIBStringField
      FieldName = 'ONBACKNOTE'
      Origin = '"OFFICIAL_NOTE"."ONBACKNOTE"'
      Size = 255
    end
    object qTCONFILE: TBlobField
      FieldName = 'ONFILE'
      Origin = '"OFFICIAL_NOTE"."ONFILE"'
      ProviderFlags = [pfInUpdate]
      Size = 8
    end
    object intgrfldTCONISVYPLACHENO: TIntegerField
      FieldName = 'ONISVYPLACHENO'
      Origin = '"OFFICIAL_NOTE"."ONISVYPLACHENO"'
    end
    object qTCFIO: TIBStringField
      FieldName = 'FIO'
      ProviderFlags = []
      Size = 769
    end
  end
  object SD1: TSaveDialog
    InitialDir = 'c:\'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 376
    Top = 16
  end
end
